10 list 15000
20 goto 10
:return ;run 
